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DATE MEETING NOTICE 
Please DONT delay! 


' LISTing Listing ' 
|: Please send submissions to: i 
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' to: LIST, Harvey Rait ' 
' 5 Peri Lane ' 
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D yearly LIST dues- $15 ' 


URGENT BUSINESS!!! 
ONE- it's time to elect new officers 
of LIST. Show up at the February 
meeting if you wish to participate in 
the election process- hopefully to 
become an officer! 


TWO- most  important- DUES ARE DUE! 
Send in your yearly dues NOW! Keep the 
TS spirit alive! Support your 
systems- support LIST. Make $15 
checks or money orders payable to 
LIST. 


NEWSLETTER HEYSEOTES 


Why a ‘technical issue’? Well the 
main reason is that I'm stuck with the 


Editor's Dilemma agaib- yep, no more 
articles. Oh I have a few, but 
they're more hardware projects. So 
bust out the Tasword, fire up the 


Quill, or if you must- ink up the pen 
and SEND IN SOME MORE ARTICLES! I 
truly thank all of you who have 
submitted and continue to submit 
articles. On the most part the 
articles have been of top quality- 
keep up the good work! 


As for the meetings- as the front page 
says "The man from TIMEX will be at 
the Feb. meeting"!!! Actually he is 
Mr. Skyrme, President of the American 
office of Psion, Inc. His purpose 
is to show off the Psion Organizer 
devices, but we know better. Ve'11 
let him show us his gadget, then we'll 
zap him with those TS questions! Mr. 
Skyrme was the Product Development 
Director for the 2068 at Timex. 


Mr. Skyrme is also scheduled to speak 
at the upcoming Trenton Computer Fair. 
He will be speaking at our T/S 


representation, scheduled for April 23 


in the afternoon. As in previous 
years, our groups will be present at 
the fair to show Sinclair is still 


going good. This fair draws T/S people 
from up & down the east coast, so make 
plans to attend...April 23 & 24. 


Myles is doing well, and may make it 
to the March meeting. If any of you 
tried to contact him at the address 
printed in the last issue, my 
apologies if you had any trouble 
reaching him. Myles is no longer at 
that particular spot. Last I know he 
was in the V.A. Hospital, ist Ave. and 
24th Street, ward 8 North, Bed 24. 
If anyone is interested in using a 
bar code reader with the QL, please 
contact me. I have a working point- 
of-sale database system for the QL, 
which is used with a bar code wand. I 
also have completed a program which 
can print bar code labels on an Epson 
compatible printer (Ci.e., the QL 
Printer, which uses double density bit 
graphics). The Program can print bar 
codes of all upper case alpha 
Characters and the numbers. By the 
way, the p-o-s program is a full 
featured program comparable with those 
on ‘other’ machines. Also, I have a 
cash register inventory program for 
the 2068, and plan to release one for 
the QL which does not require the bar 
code wand, and also a generic bar code 
database which can be customized by 
the end user for a variety of 
applications. Again, contact me if 
you’re interested. 


Bill Jones of the TS-2068 Update says 
he needs a Telecomputing writer and 


someone to keep going with extra 
memory programming for the 2068. 
Contact him if you'ld like to get 


involved at: 

TS-2068 Update 

1317 Stratford Avenue 
Panama City, FL 32404 
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gun AN LED FOR YOUR 2040 


A common complaint of many TIMEX equipment ouners is the lack 
of a power on LED Clight emitting diode) on the equipment. The 
following paragraphs describe hou to add a LED to a TIMEX 2040 or 
ALPHACON 32 thermal printer. It is a simple project but be advised 
that the author and the LIST GROUP ars not responsible for anu 
damage you may do to your equipment. 

The parts required for this project are a LED of your choice 
Calmost any color or size will do as long as it will fit into the 
printer's case), one 470 ohm 1/8 to 1/2 watt resistor, a short 
length of "telephone" or wire urap wire and a bit of rosin core 
solder. The tools required are a Phillips head screwdriver, wire 
cutters or knife, a small soldering iron and drill for the LED 
mounting hole. 

The first step is to open the printer’s case. To do this 
remove the paper from the printer, turn the case over and remove 
the four screws holding the two halves together. Turn the printer 
‘upright and lift the top off. The PC board and printer mechanism 
should remain attached to the bottom of the case. Next drill a 
hole to mount the LED. The front right hand corner of the case 
seems appropriate but it can be mounted anywhere there is room 
inside for the the LED’s leads. Be sure the case will close BEFORE 
you drill, as the saying goes "Measure twice, cut once.”. 

Once the case is prepared, the LED and resistor can be 
connected. Refer to FIGURE ONE for the connection locations. 
Solder one end of the 470 ohm resistor to the Jumper wire marked 
"We", then a length of wire long enough to reach the mounted LED 
should be soldered to the other end of the resistor. Solder the 
end of this wire to the anode of the LED. The anode lead on round 
LED's has a small Flat spot next to it on the "mounting rim". IF 
you are unsure of the proper connection, solder it to either lead. 
Now solder a length of wire from the remaining lead to the right 


side of diode 5 on the PC board (marked DS). Connect the power to _ b 


the printer with the cover off to test the LED. IF the diode 
Fails to light with the connections complete,  unsolder the two 
wires to the diode's leads, switch them around and solder again. 
Test the LED again by connecting the power. IF it still fails to 
light, check the solder joints for a proper connection or replace 
the diode in case it is defective. 

Ihe last step is to reassemble the case. Close the cover 
making sure none of the wires will interfere with the printer 
mechanism, the switches or mounting screws. Reinstall the four 
screws taking care not to strip the plastic threads in the case. 
Insert the paper and the printer is ready for use. 


J.M. Bell 
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MAKING CODE RELOCATABLE 


Most machine code programs for T/S computers will Only run 
from a single location in RAM. This is because programs usually 
have absolute addresses imbedded in them, and is a source of 
frustration. If 2 Peograms overlap, for example, they can't 
both reside in memory, and so can't both be used. 


Here is one way of dealing with the problem. 


The program MRIBT (Make Relative-1 Byte) will modify 
another machine code program so that it will run at any location 
in RAM. It is only 60 bytes long but requires you to construct 
a data table. 


The approach is that in a program with many jumps, calls 
and loads to/from absolute addresses, most such locations will 
be less than 256 bytes apart. A table of i-byte offsets can be 
used to store these separations. 


Because offsets are at least 2 bytes apart, OO and O1 are 
free to be used as flags: OO signals end of table and Oi marks 
a 2-byte offset. (see next Paragraph) 


There is a penalty to be Paid if successive locations are 
more than 255 bytes apart. The table must then contain 3 bytes 
for this next location: 


O1 to warn 2-byte offset coming 
2-byte offset (LO-byte first). 


Your program must be entered by a USR call from Basic, so 
that the address called is in the BC register. I believe all 
Timex/Sinclair computers are alike in this respect. 


Proceed as follows: 
1. Prefix your program with the table constructed as follows: 


ist 2 bytes-starting address of your program including my 
MRIET. 

next bytes-offsets as described above; 1 byte for locations < 
256 bytes apart; Z bytes for locations more than 
256 bytes apart. 

last byte-OO to mark end of table. 


0.5 


2. Prefix the table with the MR1BT program below. If your pro- 
gram does not run from its first byte, insert a jump to the 

running address at the end of MRIBT. This will become the first 
Offset in your table. 


3. To relocate the program, load to any address a; then just 
RANDOMIZE USF a. (or PRINT USR a, whichever your program uses). 


All absolute addresses marked by the table are now 
to the new location. Also the address a has been 
bytes). 


table (ist 


4. If you call various parts of the program 


calls will need adjusting. 
(with the value of a above), 


adjustment. 


5. It is not easy to get all the offsets right. 


adjusted 
put into the 
And your program is up and running. 
from Basic, the 
If you use a variable for the calls 


then you need make only one 


One error or 


omision and everything comes out wrong for the rest of your 


program. 


So MRiBT has no commercial prospects, and I offer it 


for free to the T/S Community. 


cooo CS 


C022 23 
C023 SE 


213D00 


MRIBT 


OP CODE Mnemonics 


FUSH BC 
LD HL,OO3D 
ADD HL,BC 
LD C,(HL) 
INC HL 

LD B,(HL) 
DEC HL 

EX (SP),HL 
FUSH HL 
XOR A 


SBC HL,BC 
POF BC 

EX (SP),HL 
LD (HL),C 
INC HL 

LD (HL),D 
INC HL 

LD AHL) 
LD E.A 

CF OO 

JR Z,COS9 
CP O1 

JR Z,CO22 
LD D,00 
JR CO26 
INC HL 
LD E,OL) 


PY 


Commentary 
SAVE USR CALL 
ADD OFFSET TO USR CALL 


1ST 2 BYTES OF TABLE INTO BC; 
THIS IS THE OLD USR CALL 


CARRY FLAG-O 
x-DIFF. OF 2 USR CALLS;AaLL ABS. 
ADDRESSES MUST BE ADJ. BY X 


FUT NEW USR CALL IN 1ST 2 BYTES 
OF TABLE;THIS FEATURE MAKES 
PROPER RELOCATION AUTOMATIC 

LOOF STARTS HERE 

A=NEXT TABLE ENTRY 


IF O, END OF TABLE;JUMP TO YOUR 
PROGRAM 

1 BYTE PENALTY 
APPLIES 
DOED NOT APPLY 


FUT OFFSET INTO DE 


C024 23 
Co25 


Co26 
co27 
co28 
Co29 
Co2A 
CO2B 
CO2C 
CO2D E3 
CO2E 19 
CO2F 
Co3o0 
CO31 
cos2 
coss 73 
Cos4 ES 
Coss C1 
Cose ES 
Cos? 
CO39 Di 
COSA 
COSE 
COSC 


Here 


INC HL 
LD D,(HL) 


EX (SP),HL 
EX DE,HL 
ADD HL,BC 
LD CHL) 
INC HL 
LD B,(HL) 
PUSH BC 
EX (SP),HL 
ADD HL,DE 
EX DE,HL 
EX (SF),HL 
LD (HL),D 
DEC HL 
LD (HL),E 
EX (SF),HL 
FOF BC ! 
EX (SF).HL 
JR CO13 
POP DE 
JP (HL) 
NOF 

NOF 


MAIN ADJUSTING ROUTINE 
FUT X IN HL & TABLE FLACE ON STACK 
X IN DE;TABLE OFFSET IN HL 
PROGRAM LOCATION (PL) IN HL 
CONTENTS OF FL, NEXT ADDRESS YO 
BE ADJUSTED (NA) IN BC 
I.E. NA-(FL) 
X ON STACK 
NA IN HL;PL*1 ON STACK 
ADJUST NA 


X ON STACK;PL-*1 IN HL 


FUT ADJUSTED ADDRESS 
INTO PROGRAM 
X IN HL;FL ON STACK 
PL IN BC 
X ON STACKSTABLE PLACE IN HL 
LOOF 
EXIT TO KELOCATED PROGRAM; 
(IF NEEDED ENTER AN 
ABSOLUTE JUMP IN THESE 
LAST 3 BYTES) 


is an example of how it works. Consider this little 
program which prints a text (not shown). 


FOOO 
F100 
F101 

F104 
F10S 
Fio? 
F109 
F1Oñ 
F1OB 
F10D 


FF 
2100FO 


(256 BYTES OF TEXT) 
END OF TEXT 

LD HL,FOOO 

LD A,(HL) 

CF FF 

JR Z,Fi0D 

RST 10h 

INC HL 

JR F104 

RET. 


To make this program relocatable, note there is only one 
absolute address, and the text must be jumped over. The table 


will be 7 bytes long, 2 


for the new start, 1 byte offset to the 


jump, 3 byte offset to the address at F102, and OO to end the 


table. 


Add the 7 byte table to the. 60 byte MRIBT program and you 
get 43h. So MRIBRT is located at FOOO-OO4S-EFBD. At EFF6, a 
jump to F101 must be inserted (else JF (HL) puts you in a 


crash at FOOO, the text). 


The first 


offset is EFF?—-EFBD-OOS3A, 


and the next is F1O02-EFF?-0O1OB. 


Here is how your relocatable program looks: 


0c 


ADDE OF CODE  MNEMONICS COMMENTARY 


EFBD CS FUSH RC START OF HF1BT 
EFF& C3OIF1 JF F101 JUMF OVER TEXT 
START OF TABLE 
EFF3 BDEF start address.lo byte first 
EFFB 3A ist offset I 
EFFC O10BO1 2-byte offset,lo byte first,with O1 flag 
EFFF OO end of table 


FOOO-F10D FROGRAM AS ABOVE 


XX XX OK OK * X * OC OC X X K< * K K KX K K K K X K K X X K K K X XK oc oc oc oc KOK OK o o KOK OK X 


* 


USER DEFINED GRAPHICS, REVISITED! 


x 


kKkkkkKkKkkkkKKKKKKKkKKKKKKKKKKKKKKKKKKKKKKKKKKKXK 


BY CEDRIC R. BASTIAANS 


My article "USER DEFINED GRAPHICS MADE EASY" (LISTing of 
September '87 and HATS of October '87) requires a few further 
observations... 


(1) When the program has been loaded and it runs, one of 
the first messages on screen is that the UDG's cannot get lost 
by such commands as NEW, CLEAR, SAVE or LOAD. Even though this 
is true, it might suggest that the UDG's can be SAVEd! 

The only way to SAVE UDG's is by the method shown in the second 
page of my article, by DATA, READ and RESTORE commands. 


(2) Then, Basil Wentworth brought to my attention that it 
is possible for the program to run into a snag. That happens 


when the BLACK SQUARES occuring in program lines 120, 210 and 
230 are constructed by: 


INVERSE or INVERSE VIDEO "space" 


Should you have done this, you will have noticed that you 
can't progress beyond line 120, since you will get the error 
message: 


K Invalid color, 120:3 
I would never have thought of using any of the above 
commands to make a black square, so I never ran into this 
problem. Two correct ways of making a black square are: 


(a) GRAPHICS shifted 8 (then undo the graphics mode) 
(b) CHR$143 


or 


Method (a) is by far the easiest. 


I hope that you have not been discouraged by any such 
problem; try the program and you will find that it is the 
easiest way yet to make UDG's! p C 


* * x 


ZX81/TSXXXX OUT-BOARD REAL-TIME CLOCK 
by Tim Stoddard 


The following is a description of the Real-Time clock 
section of the D.A.M. board article which appeared in Time 
Designs Magazine ( March/April '87 page 23 >). The board 
features a full-function real-time clock with battery back-up 
and is mappable into eight I/O port blocks. See attached 
schematic diagran. 


8255 PPI 


The 8255 PPI is used to interface the MSM5832 clock to 
the Z80 buss. This is needed because the MSM5832 is too slow 
of a device to attach directly to the Z80 buss. 

The 8255 has three ports called "A", "B", and "C". The 
module uses port "A" to xfer data to the MSM5832, port "B" to 
Select the proper register in the MSM5832, and port "C" to 
toggle the control signals to the MSM5832. These three ports 
are accessed by writing or reading one of four registers in 
the 8255. Port "C" is also bit-addressable by writing a 
Special code via the CONTROL register. This allows us to 
toggle a single control signal to the MSM5832 without having 
to "remember" what state the other three  MSM5832 control 
Signals were. The following is the table Showing which 
registers control what in the 8255; 


REGISTER PORT 
(0) A 
1 B 
2 C 
3 CONTROL 


The first action that should occure in your BASIC or 
machine language routine is to initialize the 8255 by 
Clearing port "C" and then setting up the 8255 to write, or 
read the MSM5832 clock chip. This is done via register 3; the 
CONTROL register. To write to the  MSM5832 you need to 
initialize the 8255 so that ports A,B, and C are all "output" 
ports. This is done by writing the control register in the 
8255 with an 80,&x ( 128586 ). To read the MSM5832 we'll need 
to initialize the 8255 so that port A is an input port and 
ports B, and C are output ports. This is done by writing the 
CONTROL register in the 8255 with a 90.4.4: x ( 144 pee J; A 
one-time action after powering up the computer is to 
initialize the 8255 ( to read or write the MSM5832) then 
"clear" port "C" by writing a ZERO to register 2. This resets 
the active-high control signals HOLD, RD, and WR to the 
MSM5832, and causes the MSM5832's CS to go active via the 
inverter. 

The 74HC138 is used to select a "block" of I/O ports to 
be used with the clock module. The HEX address of the ports 
always end in 3, 7, B, or F, So if the 74HC138 is strapped 
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for "block five", the I/O ports would be 53, 57, 5B, and 5F 
for 8255 registers  O, 1, 2, and 3, respectively. The 
following table summerizes the relationships: 


8255 8255 reg TIMEX MSM5832 FUNCTION 
PORT ADDRESS HEX DEC 

A 0 53 83 DATA port 

B 1 57 87 REGISTER ADDRESS port 
C 22 5B 91 CONTROL port 

CNT 3 5F 95  ---------------------- 


The above table assumed a "block" of 5. You can re-strap 
to any of the eight blocks to avoid conflict with other 
devices attached to your computer. 

Ve use a special function in the 8255 that allows us to 
change single bits in port "C" rather than "remembering" what 
all the bits should be in port "C". This is done by writting 
a special code via the 8255's CONTROL port SF,.. The syntax 
Of this code is as follows: 


D7 D6 D5 D4 D3 D2 D1 DO 
0 0 (0) (0) X X X SR 
N 7 1 = SET 
N SELECTED / O = RESET 
` BIT 7 
000 = 0 
001 = 1 
etc 


MSM5832 CLOCK CHIP 


The following table describes the various registers in 
the MSM5832 and their limits: 


REGISTER COUNTER DATA I/O LIMITS NOTES 
ADDRESS D3 D2 D1 DO 
0 S1 X X X X 0-9 1 
1 S10 X X X 0-5 1 
2 MI1 X X X X 0-9 
3 MI10 X X x 0-5 
4 H1 X X X x 0-9 
5 H10 + + X X 0. --2 2 
6 w X X X 0-6 3 
7 D1 X x X X 0-9 
8 D10 * X X 0-3 4 
9 MO1 X X X X 0-9 
A MO10 X Q c 
B YR1 X X X X 0 — 9 
C YR10 X X X X 0-9 


NOTES 
(1) Register set to zero when written to. 


(2) D3=1 for 24hr or D3=0 for 12hr clock 
D2=1 for PM or D2=0 for AM 


(3) Days from Sunday. Sunday = 0, Monday -1, etc. 


(4) D2=1 for leap year. 


AN EXAMPLE 


The following is an example showing how to read the day 
of the week from the clock module. Assume the module is 
mapped in block #5 < ports 53, 57, 5B, 5F ). 


(1) After powering up the computer write a 90,. to the 
8255 CONTROL port, 5F,«. This sets up the module to read the 
MSM5832 clock chip. 

(2) As a one-time operation clear port "C" in the 8255 
by writing a O to port 5B,«. This need only be done one time 
after powering up. 

(3) Write the desired MSM5832 register address to port 
"B" of the 8255 by writting a 6 < 6 = day of the week)to port 
57 ie. 

(4) Strobe the MSM5832 RD signal active by writting a 
OB,< to the 8255's CONTROL port 5F,.. 

(5) Read the day of the week by executing an input 
instruction on port 53,.. 

(60 Return the MSM5832 RD signal inactive by writting a 
OA... to port 5Fi;.. 

(7) You can now read any other  MSM5832 register by 
following steps 3, 45. 55 and 6 using the desired MSM5832 
register address in step 3. 


To change the day of the week to Saturday (6): 


(1) Initialize the 8255 to write the MSM5832 by 
writting an 80,4 to the 8255's CONTROL port 5F,.. 

(2) Select the day of the week register in the MSM5832 
by writting a 6 to port 57,... 

(3) Latch the new day of the week in the 8255's port A 
by writting a 6 ( Saturday) to port 53,;.. 

(4) Store this new data in the MSM5832 by toggeling the 
WR signal. This is done by writting a OD,« to port SF,4. Then 
imediately follow by writting a OC,» to port 5F,;.. 

(5) You can now change any other MSM5832 register by 
writting the new register address to port 57:4, latching the 


new data via port 53,4, and toggling the MSM5832's WR signal 
as in step 4. f. q 
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